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About This Book 

This book contains simple games 
programs to play on a microcomputer. 
They are written for use on ZX8 1 , ZX. 
Spectrum, BBC, VIC 20, 
11^-80 and Pet and Apple micros, and 
many are short enough to fit into the 
acai's IK of memory. 

Most micros use the language BASIC, 
but they all have their own variations or 
dialects. In this book, the main listing for 
each program works on the ZX8 1 and 
lines which need changing for the other 
computers are marked with symbols and 
printed underneath. The fact that the 
programs are written for several micros 
means that they do not make fuU use of 
each one's facilities. You could try 
finding ways of making the programs 
shorter and neater for your micro. 

For each game, there are ideas for 
changing and adding to the programs 
and towards the back of the book you 
will find tips and hints on writing games 
of your own. Also in the book is a 
conversion chart to help you adapt 
programs in magazines and other books 
for your micro and a simimary of the 
BASIC terms used in this book. 

Typing in the programs 

Lines which need changing for 
computers other than ZX8 1 are marked 
with these symbols: 
A VIC and Pet 

* BBC and Acorn Electron 
■ TRS-80 

• Apple 

t ZX Spectrum 

Every time you see the symbol for the 
micro you are using, look below for the 
corresponding line nimiber with the 
same symbol and type that in instead. 




Points to remember 

1 Type the lines exactly as they are printed 
including all ptmctuation and spaces. 

2 Press RETURN, NEWLINE or ENTER 
key at the end of each program line. 

3 Check each Une as you go. 

4 Make sure you don't miss out a line or 
confuse one with another. A piece of paper 
or a ruler is useful to mark your place in 
the listing. 

5 Look out for the symbols and make sure 
you use the correct lines for your 
computer. 

6 If you are using a ZX8 1 or ZX Spectrxim, 
remember not to type the program 
instructions letter by letter but to use the 
special key for each instruction instead. 

You may find it easier to get someone to 
read the program out to you while you 
type it in. Don't forget to explain that they 
must read every comma, fullstop, bracket 
and space and differentiate between letter 
"O" and zero, FOR and 4, and TO and 2. 

Debugging programs 



When you have typed 
in the program, check 
your manual to find out 
how to display it on the 
screen. (Usually you 
type LIST followed by 
the line numbers of the 
section you want t o 
see.) 



VIC 20 versions of all except the graphics program should workon 
^Pet computers. 







Check you have 
typed everything 
correctly. It is easy to 

make mistakes, so 
expect to find some. Use 
your manual to find out 
how to make changes to 
the program once it is 
typed in. If in doubt, you 
can always type the line 
again. All the computers 
will replace an existing 
line with a new one with 
the same number. 
Here is a checklist of common 
mistakes to look out for: 

1 Line missed out 

2 Line wrongly numbered 

3 The beginning of one line joined onto 
the end of another. 





4 Brackets, commas, colons, semi- 
colons, fullstops or spaces missed out, 
especially in long, complicated lines. 
Watch for double brackets in particular, 

5 Wrong line used for your computer. 

6 Letter "O" confused with zero. 

7 Wrong numbers used, e.g. extra zeros 
included. 

Playing the games 

To start the game you must type RUN. In 
some games things happen very quickly, 
so make sure you have read the 
instructions and know what you are 
supposed to do. 

It is quite likely that the program still 




has a mistake in it and either won't : 
at all or the game won't work properly. 
Sometimes your computer will give you 
an error code which you can look up in 
the manual. This may help you find the 
mistake, though not always. List the 
program again and check it carefiilly 
against the book. 

When the game is over, the computer 
will usually say something like BREAK IN 
LINE 200, To play again, you have to type 
RUN. 

Experimenting with the games 

There are suggestions for changing and 
adding to the programs throughout the 
book, but don't be afraid to experiment 
with changes of your own. You can't 
damage the computer and you can 
always change back to the original if the 
changes don't work. 

You will probably find you want to 
adjust the speed of some games, * 
especially after you have played them a 
number of times. You will find out which 
line to change on each program page. 

Wherever you see 
PRINT, you can 
change the message iny 
quotes that follows it toj 
whatever you like. 
Also, unless you have 
ZX81 with only IK, you 
can add extra 
messages. 
Type a line number (say 105 if you want 
to add a message between lines 100 and 
1 10), then type PRINT, then your 
message inside quotes. 

If your computer can make colours 
and sounds, you could use your manual 
to find out how they work and try adding 
them to the games in this book. 





*See page 37 for a special note for BBC and Spectrum users. 



Robot Missile 



The year is 2S62 and the people of Earth are in the 
midst of battle agaiiist the Robots. A lethal Robot 
Missile has just landed and everyone is depending 
on you to find the secret code which unlocks its 
de^e mechanism. If you fail, the entire Earth 
Command Headc[uajrters will be blown up. 

Your computer knows what the code 
letter is. You must type in your guess and 
it will tell you whether the code letter 
is earlier or later in the alphabet. 
You have four chances to find the 
correct letter before the missile 
blows up. 




^ 



\.'J 



\r 



10 PRINT 
20 PRINT 
30 PRINT 
40 PRINT 



"ROBOT MISSILE' 



"TYPE THE CORRECT CODE" 
"LETTER (A-Z> TO" 
50 PRINT "DEFUSE THE MISSILE." 
60 PRINT "YOU HAVE 4 CHANCES" 
70 PRINT 



s*«A»80 LET C*=CHR*(37+INT<RND«26+in- 



How the program 
works 



Thes« lines print the title and 
instructions. 





90 FOR B=l TO 4 
lOO INPUT G* 



This selects a number 
between and 26, converts It 
to a lettei (the "secret code") 
and puts it in CS. 



Line 90 begins a loop which 
makes lines 100-140 tepeat 4 
times. 



I 



1— Puts yonz guess in G8. 




110 IF B*=C» THEN GOTO 210' 



120 IF G*<C* THEN 
130 IF G*>C* THEN 

140 PRINT " THAN 



150 NEXT G 




ito 


PRINT 


M-^jU m~A~r — 




170 
ISO 
190 


PRINT 
PRINT 
PRINT 


"BOOOOOOOOMMM. . . " 

■■YOU BLEW IT." 

"THE CORRECT CODE WAS " ; C» 


- This prints if all yoni guesses 
were wrong. 


200 


STOP 






210 
220 
230 


PRINT 
PRINT 
STOP 


"TICK.. .FZZZZ... CLICK...''' 
"YOU DID IT" 


- This prints if 7oa gueraed 
right. 



■ Checks if your letter is the 
same as the "secret code" in 
a. if so computer jumps to 210. 

Checksifsecietcodeletteria 
earlier or latei in the 
alphabet than yours and 
prints an appropriate 
message. 

End of loop. Goes back for 
next turn. 



The above listing will work on a ZX8 1 . For 
other computers, make the changes below. 
*A»BO LET C*=CHRt (64+INT(RND(l>*26+l) ) 
■80 LET C*=CHR»(64+1NT<RND(0)*2&+1)) 

sSO LET C*=CHRt <6A+INTCRND »2&+l) ) 



Z^ 



Adding to the program 

You can make the computer print an 
extra message for a correct guess on the 
last go. Change line 220 by adding a 
semicolon to it, like this; 

220 PRINT "YOU DID IT"; 
and add a new Une 230: 

230 IF G= 5 THEN PRINT "(JUST)" 




Puzzle corner 



See if you can work out how to change 
the program to give you more or less 
chances of guessing the code letter. 



The Vital Message 








i 












You are a laser 

coimnimications 

operator. Your 

job is to intercept 

robot messages and relay 

them to Command HQ. A vital 

code message is expected. If you 

relay it correctly, the Robot attack 

will be crushed. 

This game tests your skill at 
remembering a group of 




letters which you 

see for only a very 

short time. The computer 

will ask you for a difficulty 

from 4 to 10. When you have typed 

in your answer, letters will appear 

top left of your screen and disappear 

again fairly quickly. Memorize them 

and then type them into the computer 

and see if you were right. 



How the program works 



A«10 CLS< 



20 PRINT "VITAL MESSAGE" 

30 PRINT 

40 PRINT "HOW DIFFICULT? (4-10) 

50 INPUT D 

60 IF D<4 OR D>10 THEN GOTO 40- 



■ CleazB >cn«ii bafoxe gams rtazts. 



JUln yon for a "difficvdty nnmbfiz" and 
IbD. 






70 LET M»«' 




Cliacia yooz aumbaz iant i«« tbmn 4 
ormozethanlO. 

Sato op an empty ("nnU" in compntsx 
langnaga) abiug laJwUad MS in which 
the computer can store the sseiet 
msssags. 



BO FOR 1 = 1 TO D n CompaterIoopan>imdDtlmsa.Each 

|«*HA«*?0 LET M*=M*+CHR*(INT(RND*26+3S) jUl©OpJ*eho«»aaIetteiandaddsltto 



100 NEXT I 

A«110 CLS 

120 PRINT "SEND THIS MESSA6E: 
130 PRINT 
140 PRINT M* 



I the string of lettsis It has alisady 
chosen and put in MS. 



^■A»1S0 FOR 1=1 TO D*8 
160 NEXT I 



y 



h 



Clean scrsen and then prints the 



A«170 CLS- 



Message stoys on screen while 
■ computer loops nmnd, doing nothing, 
for a number of times depending on D. 

f Clears scrsen when loop has finished. 



180 INPUT N«- 



190 IF N«=M* THEN SOTO 240- 



WRONG" 
HAVE SENT; 



^ 



■ Puto your version of the message in 

NS. 

■ Checks if your menage is the same a 
the message in MS and lumps to 240 

if it Is. 



200 PRINT "YOU BOT IT 

210 PRINT "YOU SHOULD 

220 PRINT M« 

230 60T0 260 

240 PRINT "MESSAGE CORRECT" 

250 PRINT "THE WAR IS OVER" 

260 STOP 



The abovm Uctlitv will wrork on a ZX81 . For 
other computen, make the changee below. 

»10, 110, 170 HOME 

AlO.llO, 170 PRINT CHR«(147> 
*A«90 LET M*=M*+CHR»(1NT(RND(1) t26+65) 

■90 LET M*=M$+CHRS(lNT(RND(0>*26+65) 

• 90 LET M»=M»+CHR*(INT(RND*26+65>> 
■ A* 150 FOR I = t TO 0*180 

*150 FOR 1=1 TO D»400 



Prints If you are wrong, telling you 
what the message sboidd hav* tasen. 




E&i 



Howto make the game harder 

You can change the program to include 
numbers and punctuation marks in the secret 
message. Do this by changing line 90 as follows: 

«90 LETM$=M$+CHR$(INT(RND*43+21)) 
*A«90 LETM$=M$-fCHRS<INT(RND(l)*43+48))| 
■90 LETM$=M$+CHR${INT(RMD(0)*43+48))| 
S90 LETM$=M$+CHR$(INTtRND*43+48)) 



Puzzle corner 

Can yon work out how to make 
the message stay on the screen 
longer? 



^pp^ 



Shootout 

Tou are standing back to 
back. Yon take 10 paces, turn 
and reach for your gun. How 
quick are yon? Can you 
shoot first? 

Your computer prints the 
numbexs 1 to 10 to represent 
the 1 paces, pauses and 

en prints HE DRAWS . . . 
Tou must be ready to press ; 
key (any one will do) th j 
liiitant^liese words c<^ 
t^iei^;^!!. Iftfou are ^icl 
enough, you wl&wiidfcfflt^^ 

SM^M^^SrAWS comes up oiV*8hwill 
1^^. ''^itaBnticallylbse. 




FDR 1=1 TO 
, ^•^AQ PRINT I ; " . 
•^^70 NEXT I 



A* 10 CLS 
20 PRINT 
30 PRINT 
40 PRINT 

50 



"CDWBOY SHOOTOUT -" 
"YOU ARE BACK TO BACK' 
"TAKE 10 PACES. . . " 



10~L 

"'i 



SO PRINT 
•■A«70 FOR 1=1 TO RND*200 
lOO NEXT I 



*A«1I0 IF INKEY*<>"" THEN GOTO 160 
120 PRINT "HE DRAWS..... "; ■ ^ 







How to change the 
speed of the game 

You can adjust the time you 
have to react to the message 
and press a key by changing ' 
the last number in line 130. A 
smaller number wrlU give yon 
less time. (For the BBC, 
change the number in 
brackets in line 140.) 



• ■A»130 FOR 1 = 1 TO 5 
•a»140 if INKEY*<>"" 
•150 NEXT I 



THEN GOTO 190 



■} 




^D.'J- 



160 PRINT "AND SHOOTS. 

170 PRINT "YOU ARE DEAD. 

180 GOTO 210 

190 PRINT "BUT YOU SHOOT FIRST. " — 

200 PRINT "YOU KILLED HIM." 

210 STOP 
Ute above listing will work on a ZX81 . For 
other computexs, make the changes below. 

•10 HOME 

AlO PRINT CHR*tl47> 
*60 PRINT ;I;".. "i 
•■A«65 FOR J=l TO 300 ; NEXT J 
*A«90 FDR 1=1 TO RND(1)*1000 
■90 FDR 1=1 TO RND(0)«1000 
•110 IF PEEK(-163B4)>127 THEN GOTO 160 
Alio BET I* : IF I»<>"" THEN GOTO 160 
• no IF INKEY»(1K>"" THEN GOTO 160 
•130 FOR 1=1 TO 20 
■ A130 FOR 1 = 1 TO 50 
•DELETE 130,150 

•140 IF PEEK<-163B4) >127 THEN SOTD 190 
A 140 GET I* : IF I»<>"" THEN 60T0 190 
•l40 IF INKEY»(40)<>"" THEN GOTO 190 



Making the game harder 

If yon change the program as follows, you will add 
the possibility of you missing sometimes: 

1) in line 140, change 190 to 220. 

2) Add these lines: 



S ZX 220 IF RND>.3 THEN GOTO 190 
•a«220 if RND( 1)>.3 THEN GOTO 190 
■230IFRNIX0)>,3THENGOTO 190 

230 PRINT "BUT YOU MISSED" 

240 GOTO 90 



^^ 



How the program works 



This is a loop which sends the 
computei' round 1 times to 
print a number and two dots 
■ each time. 

Another loop - this time to 
make the computer delay. 
The computer loops round a 
. number of times depending 



on the value of RND, doing 
nothing. 

Checks you're not cheating 
< by pressing a key before HE 
DRAWS conies on the screen. 

■ Prints the signal for you to 
press a key. 

Checks the keyboard to see if 
. you are pressing a key, and 
jumps to 190 if you are. 
(Notice that line 140 is in the 
middle of a FOR . . . NEXT 
loop. This makes the 
computer check the 
keyboard a number of times 
to give you a reasonable 
chance of pressing a key.) 

, Prints if yon lose. (Either yon 
ran out of time or were 
cheating.) 

• Piinte if you «^. 



Delay loops can be written 
in one line, as in line 65, for 
aUbuttheZXSl. 



, An extxa. delay loop for the 
faster computers. 



'»<ll 



:5!i 



r-- -^■ 



S K s^ 



Notice bow the different 
computers check the 
keyboard: Vic uses GET, 
Apple has to I^EK into its ^ 
memory, the others use 
.INKEYS. 



Puzzle corner 

See if you can work out < 
how to make it possible 
for the computer to miss 
too. 




Desert Tank Battle 



The last major stronghold of Robot forces outside the U.R.S* is hidden in ancient 

castle ruins In the middle of the desert. A fleet of desert hovertanks has been sent 

to destroy it and you are the commander. Your tank controls the live remaining 

missiles. 

You must assess carefully the direction and elevation before you launch each 

one. Your computer will ask you for a direction angle between —90° (extreme left) 

and +90° (extreme right) and an elevation angle between 0° (along the ground) EUid 

90° (straight up in the air). The elevation determines the distance the missile will 

travel. 
Is your aim good enough to destroy the robot stronghold? 



**. 



^^ 




10 PRINT "DESERT TMflC BATTLE" 
•■A* 20 LET T=INT(RND»181)-90-.— 



* 



•■a«30 let D=RND' 



How the program works 

This selects a whole number 

■ between — 90 and 90 for the 
direction. 

■ This selects a. nuTnfaer 
between and 1 for the 

40 FOR G=l TO 5 "l distance of the castle from 

50 PRINT "DIRECTION t-90 TO 70J ?" I ^*"'' 

60 INPUT Tl I Get your guesses and pnts 

70 PRINT "ELEVATION <0 TO 90) ?" I theminAandB. 

SO INPUT B J 

Uses your elevation angle to 

■ calculate the distance your 
missile went. (Answer will be 
between and 1). 

100 IF ABS(T-T1)<2 AND ABStD-DlX.OS THEN GOTO 220 Ifyonr 

direction was within 2 degrees 
and your distance within 0.05, 
' ABS takes the "absolute" "\ then you have hit the castle, 

value of a ntunber , which ) Program jumps toline220to 

means it ignores + or — >/ tell you so. 

signs. 

110 PRINT "MISSILE LANDED " ; "1 Compares your direction 

120 IF TKT THEN PRINT "TO ThiE LEFT "j L- angle with the number 
130 IF T1>T THEN PRINT "TO THE RIGHT "J chosen in line 20 and prints 

an appropriate message . 



90 LET Dl=SINt2«<B/180f3. 1416) ). 




THEN 




PRINT "AND " ; DedidOT 

whether to print "and" by 
comparing the distance 
your missile travelled with 
the number chosen in line 30. 



150 
160 
170 
ISO 
190 
200 
210 
220 
230 
240 



.05 
.05 



THEN 
THEN 



IF D-D1> 

IF Dl-D> 

PRINT 

NEXT G 

PRINT "DISASTER - 

PRINT "RETREAT IN 

STOP 

PRINT "»KABOOOMMM« 

PRINT "YOU'VE DONE 

STOP 



PRINT 
PRINT 



'NOT 
■TOO 



FAR 
FAR' 



ENOUGH" 



■ Prints a message 
if your shot was 
too long or short. 



YOU FAILED 
DISGRACE 



P}- 



IT "J 



■ Prints if you lose. 



Prints if yon win. 



The above listing will work on a ZX8 1 . For 
other computers, make the changes below, 

•a»20 let T=1NT(RND(1)»181>-90 
■20 LET T=INT(RND(0) »181 )-90 

*A«30 LET D=RND(1) 
■ 30 LET D=RND(0> 




Puzzle corner 



Can you work out how to add the 
possibility of the robots seeing you and 
shooting at you before your five goes 
are up? 



^United Robot Sta tes 




Battle at Traitor's 
Castle 



0i> 



-ti 



\Tk 



'■/, 



10 PRINT "TRAITOR'S CftSTLE" 
20 LET S=0 



30 FOTl B=l TO lO 



40 LET R«- 



121 



The King is waging a fierce and 
bloody battle against his 
deadliest enemy - the Traitor 
Baron. You are one of the King's 
crack bowmen and at this very 
moment you are crouching 
behind the bushes outside the 
Baron's Castle, shooting at his 
men as they Uft their heads above 
the battlements. 

You r computer will print a row 
containing eight dots and an O. 
The number keys 1 to 9 
correspond to the position of the 
in the row. You have a short time 
to press the correct key, and hit 
the O, before it disappears. 

How many of the Baron's men 
can you hit? 



-4rBA«50 LET T=INT (RND»9-H > - - 

60 FDR L=l TD 9 
70 IF L=T THEN LET R*=R*+"0" 
ao IF LOT THEN LET RS=R»+". 
90 NEXT L 



100 PRINT ««,■ 



•■A*UO 
•X«120 



1=1 TO 12 
I»=It*;EV» 



IF VAL( 
NEXT I 



■0"+I»)=T THEN BOTO 170- 



150 PRINT "MISSED" 
160 GOTO 190 
170 PRINT "BDOD SHOT" 
ISO LET 5=S-H 



■1 



190 NEXT G 

200 PRINT 
210 STOP 



'VDU HIT "|S|"OUT OF 10" 



\A The above listing wiU work on a ZX8 1 . For 
Jlp other computeis, make the changes below. 

■50 LET T=INT(RND(0)*9+1) 
*A«SO LET T=INTCRND(1>«9+1) 
A 110 FOR 1 = 1 TO 200 
■ 110 FOR 1 = 1 TO 60 
• •110 FOR 1 = 1 TO 90 
•115 LET !»="" 
1*120 LET I«=IM<EV*(1> 
[•120 IF PEEK(-163B4) >127 THEN GET 
A 120 GET I» 



I« 



'^^:mi^<::^/,. 



Making the game faster or slower 




You may find that the computer works too quickly 
01 too slowly for you in this game. You can adjust 
this by changing the last number in line 1 10. A 
lower nuniber will make the game faster. 



How the program works 

Sets your score to zero for 

- start of game. 

• Beginning of loop which 
gives you 10 goes. 

> Sets up an empty string, RS. 

• Selects a nnmber between 1 
and 9 and pats it in T. 

Loops round 9 times, adding a 
character to the string, RS, 

• each time. The character is O 
for the position 
corresponding to the number 
in T and a dot for all the others. 

■ Prints the string. 

Itoops round a number of 

- times to see if y on are 
pressing a key. (End of loop at 
Une 140} 

- Checks if you are pressing 

the right key. Jumps to 130 if so. 

Prints if you pressed the 
-wrong key or didn't press in 
time, then jumps to 190. 



- Increases your score by 1 . 

■ Sends computer back to line 
30 for another go. 

■ Prints your score when 10 
goes are up. 



Puzzie corner 

Can you change the program so that you get two 
I kinds of target - either O (one of the Baron's 
Ordinary soldiers) which is worth 1 point, orS 
(one of his Special branch) which is worth S 
points? 



1 



*^1 



^fe« 




.• *"■'••;■ 



Notice how the scoring works 
in this program (lines 30 and 
1 80). You could try adding 
this to other programs. 




0^^<> 



. 9fv 




Robot Invaders 



You must act quickly. 
Robot invaders of all kinds 
are approaching. You 
have plenty of weapons, 
but for each type of Robot 
you must select exactly 
the right one for it to have 
any effect. 

Code symbols for each 
Robot will flash up on your 
screen. Quickly press the 
key with that symbol on it 
- beware, some need the 
shift key too - and see how 
many Robot invaders you 
can destroy. 



) 



10 PRINT "ROBOT INVADERS" 

20 LET H=0 

30 FOR T=l TO 25 



•■A«40 
50 



FOR 1=1 
NEXT I 



TO INT (RND* 30+20) 



•■4*60 LET 

•■*»70 LET 

|s*BA«80 LET 

A»90 CLS- 



20) "I 
15>_f 



} 



A= I NT (RND $20 
D=INT(RND« 

P«=CHR« ( INT (RND* 53+ 1 1 > ) ■ 



100 
110 
120 



FOR J=0 
PRINT 
NEXT J 



TO 



"} 



130 PRINT TAB(AJ;F* 



•■A»140 FOR 1=1 TO 15 

•irA»150 LET R*=INKEY« 

160 IF R*=P» THEN GOTO 210 

170 IF R»<>"" THEN GOTO 190 

ISO NEXT I 

190 PRINT "MISSED" 

200 GOTO 230 

210 PRINT "A HIT" 

220 LET H=H+1 

230 NEXT T 

A«240 CLS 

250 PR I NT " YOU SCORED " ; H ; " / 25 ' 

260 STOP 



U 



I ^ 



How the program works 

■ S«tB score to zero for stait. 

- Beguming of loop which 
0.vnw yoa 25 goe«. 

' Random delay. 

Selects nnmlMn for acn>u 
and down positions on 
> screen. 

•Chooses akeyboafd character. 

-Clears screen 

Moves cursor down the 
•oreen, one line at a tlme^ 
-until it reaches line number D 
(which was chosen In line 70). 

-Moves cursor A spaces 
across the screen and prints 
the character chosen in line 
SO there. 

-Checks keyboard a number 
of times to see if yon are 
pxessing a key, checks if this 
is the right key and then 
Jumps to the appropriate line 
to print hit or I 



■Increases score by 1. 
-Goes back for another turn. 



•Prints score after 2S goes. 



^ 



f ^ i 



T-^Ti 



_3i 

[Ml 



ig wUl work on a 2X81 . Toi 
other computers, make the clianges below. 

•kAmAO FOR 1 = 1 TO INT(RND(T)«300+200> 

■ 40 FOR 1 = 1 TO INT(RND(0)»300+2(Xl) 
irAmhOfJO change RND to RND(l) 

■60,70 change RND to RNDCO) 
•a»80 let P»=CHR*(INT(RND(1)«58+33) ) 

■BO LET P«=CHR«(INT(RNDC0)«58+33) ) 

s80 LET P»=CHR»(INT(RND»5a+33» ) 

•90,240 HOME 

A90,240 PRINT CHR»(147) 
-*BA*140 FOR 1 = 1 TO 150 

•145 R«="" 

•ISO R*=INKEY*(1) 

4150 QET R* 

•ISO IF PEEK < -16384 > >127 THEN GET R» 




Puzzle corner 

These are 
the most 
dangerous of 
the robots. 




Speeding up the game 

As yon get used to playing this 
game, yon wrill probably find 
you want to speed it up. Do this 
by changing the last number in 
line 1 40 to a lower one. 
Moving the cursor 
Your computer may have a 
simpler way of moving the 
cursor to a particular point on 
the screen (see lines 100'130). 
Check your manual and see , 



>?xy 



f * f I" 



Mechans Tintroids 



W X Y 

Scrapions Wixeheads Steeleyes 



Can you adjust the program so that you get 100 points for each of these and 
only 1 points for any of the others? 




■inaAaWHt 



MM 



Secret Weapon 



If you could destroy the main Robot Spare Parts Store, which lies 
underground somewhere in the eastern wastes of the U.R.S., you could 
cripple the robot attack quite severely. 

You have a new secret weapon, as yet unknown to the robots, which 
can cut silently through solid rock, vapouzizing everything in its path. 
The Store is very cleverly concealed though. All you can do is aim 
your weapon bUndly and hope you get somewhere near the target. 

Your computer will ask you for a difficulty number (the 
smallest number allowed is 4) and then ask foryour 
guesses for the X and Y coordinates of the target. (Enter 
these separately, preiMsing RETURN, NE WLINE or 
ENTER after each one.) 

For a clue to the possible 
values of X and Y, look 
carefully at the program 
listing. 





W 



16 



A«10 

20 
30 
40 
50 

I •■A*60 
I •■A«70 
80 



CLS 

PRINT "SECRET WEAPON" 

PRINT "ENTER DIFFICULTY 

INPUT D 

IF D<4 THEN GOTO 30 



How the program works 



G«ts a dUficnlty iuunb«r from 
yon, puts it in D and checks it 
•iM mot leas than 4. 



LET 

LET 
FOR 



X=INT(RND»D+ 
Y=INTCRND«D+ 
S=l TO D+5 — 



"} 



■ Selects nnmhen foi X and Y. 



90 PRINT "GUESSES FOR X AND 
100 INPUT XI 
110 INPUT Yl 



y.T\ 



- Beginning of loop which 
Sives yon a number of goes 
depending on the difficulty 
you chose. 

•Gets yonz guesses and puts 
them inXl and Yl. 



120 LET Z=SQR< <X-Xi)»(X-Xl>+<Y-Yl)« (Y-Yl) ) 




•Works out the 
distance between 
your shot and the target and pots 
the answer in Z. 



^ Checks Z to see how close 
130 IF Z=0 THEN GOTO 200 \ you were and prints a 
140 IF Z<=3 THEN PRINT "CLOSE" I message. (If Z = O you've 

150 IF Z>3 THEN PRINT "NOT EVEN CLOSE J won.) 

160 NEXT G — '^ —• End of loop. Goes back for 

next turn. 

170 PRINT " 

180 PRINT 

190 STOP 

200 PRINT 
210 PRINT 

220 STOP 



"THE ROBOTS HAVE SEEN" 
"YOU - AGGHHHHH " 



}- 



Prints when youVe used aU 
your goes. 



"YOU DESTROYED IT IN 
G; " GOES" 



1 



■ Prints if you were successfuL ^ 



Th« above listing will work on a ZX81 . For 
other compnterSi make the changes below. 

•10 HOME 

A 10 PRINT CHR*(147) 
•a»60 let X=INT(RND(1)*D+1) 

■60 LET X=INT(RND(0)«D+1> 
*A«70 LET Y=INT(RND(1)*D+1) 

■70 LET Y=1NT(RND<0)»D+1> 



Puzzle corner 

Can yon work oat how to add the 
following scoring system? 

Score 1 point for each time yon 
are dose. 

Score 10 points for a vrin. 



Escape! 



The Robots have caught you, taken your weapons and locked you up. 
Suddenly you remember you still have youi sonar wiistwatch, which c^ be 
tuned to produce sounds of any frequency. If you can only find the reson^tx 
frequency of your Robot guards, they should vibrate so much they fall apart. 

You must be careful not to use frequencies that are too low or the building 
will vibrate and collapse on top of you. If you go too high, you will get sucha 
terrible headache you will have to give up. 

Can you escape the horrors of the Robot prison? (Look carefully at the 
program for a clue to the range of frequencies to try.) 



A»10 

20 

#■^•30 

40 
50 



CLS 

PRINT "ESCAPE" 

LET F=INT(RNDtlO0+l) 



^ 



LET 
LET 



-:;} 



60 FOR G=l TO 5 



i 



70 
80 



PRINT 
INPUT 



"GUESS? 
Fl 



■'} 



90 IF ABS(F-F1)<5 THEN GOTO 2<70- 



100 IF F-F1>40 THEN GOTO 170- 



110 IF Fl-F>40 THEN GOTO 230- 

120 PRINT "NO VISIBLE EFFECT" 
130 NEXT e 

140 PRINT "YOU TOOK TOO LONB. 
150 PRINT "THE FREQ. WAS ";F 
160 STOP 

170 IF L=2 THEN GOTO 210 

1 80 PR I NT " TOO LOW . . . CAREFUL " 

190 LET L=2 

200 GOTO 130 

210 PRINT "THE BUILDING COLLAPSED" 

220 STOP 

230 IF H=2 THEN GOTO 270 

240 PRINT "TOO HIGH. ..OUCH" 

250 LET H=2 

260 GOTO 130 

270 PRINT "YOUR HEAD ACHES ~ GIVE UP' 

2eO STOP 

290 PRINT "YOU'VE DONE IT" 

300 STOP 

The above listing will work on a ZX8 1 . For 
other computers, make the change below. 

•10 HOME 

A 10 PRINT CHR«<147) 
*i«30 LET F=INT(RND(1)»100+1) 
18 "30 LET F=INTCRND(O)»10O+l) 



How the program works 

ChoMes a number between 1 
and 100 for freqaency of 

■ robots and pote It in F. 

Pola 1 in L andH. These axe 
-used if yon go too low oz too 

high- see linei 170-190 and 

230-250. 
. Beginning of loop which 

allows yon to have 5 tnzna. 

■ Geti a gneis firom you and 
pntaitinFl. 

- Checka if yoor guesa is 
within S of F. If it Is, jumps to 
290 to print YOirVE DONE IT. 

- Jumps to 1 70 if your gness is 
so low it is less than F by 
more than 40, 

- Jumps to 230 if your guess is 
so high it is more than F by 
more than 40 

■ Prints If your guass was 
within 40 of F and goes bach 
for next torn. If all turns have 
been used, It prints the answer. 

Checks the value of L. The 
first time this part of the 
program is reached, L is 1. So 

- the computer moves down 
the program to print a 
warning, change L to 2 and go 
back for another turn. 

Next time line 1 70 comes into 
operation the program jumps 
straight to 210 to tell yon 
yonVelost. 

■ These lines check H in the 
same way to give you a 
warning first time you go too 
high and teU yon you've lost 
the second time . 




i \ 



Puzzle corner 

Th« three Robot guards 
each have their own 
resonant frequency. You 
can't escape until you 
have found all three. How 
could you change the 
program to do this? 




How to make the 
game harder 

Change the S in line 90 to a 
lowernumber. This means 
you have to get closer to F 
to win. You can also 
increase the possible 
range of F by changing 
100 in line 30 to a higher 
number. 



Pirate Dogfight 



It's you against the Sky Pirate. He moves ahead, you accelerate -He 
drops behind, you slow down. You must try to get level with him and then 
you can fire, hoping that he won't be able to fire and hit youfirst. 

Use the letter keys A to accelerate, D to decelerate and F to fire. Your 
computer will tell you your speed and position relative to the pirate. You 
will need to be ready to press the appropriate keys as soon as you press 
RUN. Keep pressing A and D until you get level and thenfire. 




A«10 CLS 



^ 



20 PRINT "PIRATE DOGFIGHT" 
•■*«30 LET V=INTtRr4D*ll-5) 



•■A»40 LET S=-INT(RND«3+1) 



50 IF ABStS)>20 THEN GOTO 230- 
A*&0 CLS 

70 PRINT "YOU ARE "; " 

SO IF S<0 THEN PRINT "BEHIND" 
90 IF S>0 THEN PRINT "AHEAD" 
100 IF S=0 THEN PRINT "LEVEL" 
110 PRINT "YOU ARE G0IN6 "; 
120 IF V>0 THEN PRINT "FASTER" 
130 IF V<0 THEN PRINT "SLOWER" 
140 IF V=0 THEN PRINT "SAME" 

•-^ 
•a •ISO LET I«=INKEY* 

160 IF I*="A" THEN LET V=V+1 
170 IF I*="D" THEN LET V=V-1 
ISO IF I*="F" AND S=0 THEN GOTO 



How the program works 

Qiooses a nombez between 
—5 and + 5 for yoiur speed 
telative to pirate and puts it 
InV. 



Chooses a nnmbez for your 
distance from the pirate 
■ and puts it in S. This is 
negative at the start, 
which means yoa 
are behind him. 




25ol 



20 



' Checks if the distance 
between yon is more than 20. 
If so, computer jiunps to 230 
to say you've lost sight of 
Urn. 

' Checks the values ofSandV 
and prints your position and 
speed in relation to the pirate. 

Looks to see if you ai« 
pressing a key and, if so, 
which one. If it is A, your 
speed is increased by 1. If D, 
yovu' speed is decreased by I. 
If you are pressing F and S=0 
(i.e. you're level) then it 
jumps to 2S0. (If S is not 
when you press F then 
nothing happens.) 




190 LET S=S+V 



-A-HA92QO 
210 
220 
230 
240 



FOR 1=1 TO 
NEXT I 
GOTO 50 — 
PRINT "YOU 
GOTO 330 



'} 



LOST SIGHT OF HIM" 



250 IF fiBS(V)<2 THEN GOTO 290' 




260 PRINT "YOU ONLY MfiNAGED 
270 PRINT "SCARE HIM. " 
280 GOTO 40 

•■A«290 IF RND>.7 THEN GOTO 320 

300 PRINT "YOU SHOT HIM DOWN" 

310 BOTO 330 

320 PRINT "HE SHOT FIRST" 

330 STOP 
The above listing will work on a ZX8 1 . For 
other computers, make the changes below^ 

•10, &0 HOME 

410,60 PRINT CHR*C147> 
^A*30 LET V=INT<RND(l)»ll-5) 

■30 LET V=INT(RND<0>»ll-5) 
*A»*0 LET S=-INTtRNDtllt3+l> 

■40 LET S=-INT<RND(0)«3+1) 



TO"! 



Works out the new distance 
between you. 

Delay loop. 

CSoes back to 50 to repeat. 

Comes into operation if you 
fixed when level. Checks 
speed is less than Z (ignoring 
+ and — signs) and if so, 
Jumps to 290. 

Prints a message If speed was 
more than 2 when you fired. 
Returns to 40 to start again 
with a new value for S. 

Applies a random test to see 
if yon fired before the pirate. 

' Prints a message depending 
on the result of the test in 290. 



I« 



• 145 


1*="" 


■*1S0 


I«=INKEV«(1> 


• 150 


IF PEEK(-163B4)>1Z7 THEN GET 


*150 


GET I« 


• ■A»2O0 


FOR 1=1 TO 200 



■ 290 IF RNDCO)>.7 THEN BOTO 320 
•kAmZfO IF RND<1>>.7 THEN BOTO 320 




How to make the game easier 

Yon may find this game quite difficolt. 
To make it slightly easier, add these two 
lines. You will then be able to see the 
relative positions of the two planes 
printed on the screen. 

195 IF ABStS)>10 THEN KJTO 200 
Ifb PRINT TAB(w/2)i "HIM" 

197 PRINT TflB(S+w/2>i "YOU" 

Replace w with the width of your screen. 



The random test in line 290 is loaded in 
your favour. How could you change It so 
your chances of winning are equal? 



21 



Supersonic 
Bomber ^y- 



K( 




Yon are on a lone supersonic bombing 
mission over the U.R.S. Your computer 
shows graphs of Robot population based 
on infrared photographs relayed to it by 
satellite. You only have time to attack 
one target in five, so you must quickly 
select the one with the highest 
population of Robots and release one of 
your "Corrodarobe" bombs on it. (These 
contain a substance so corrosive it can 
dissolve a Robot's body in seconds.) 

To release a bomb, press the number 
key which corresponds to the number 
next to the graph of highest Robot 
population. If there are two the same, 
choose the one with the lowest number. 

Will you be a hero when you return to 
base? 



^ 



"Hfi^" 



^ 



# 



A»10 CLE 

20 PRINT "SUPERSONIC BOMBER' 



30 DIM B(5 




40 LET S=0 



50 FDR B=10 TO 1 STEP -1 



P 






60 LET M=i 



70 FOR 1=1 TO 5 
-A^BAVBO LET B(I)=INT(F{ND*10+1> 

90 IF BCI>>B(M) THEN LET M=I 

100 NEXT I 
A»110 CLS 

120 FOR 1=1 TO 5 

130 PRINT I; 

140 FOR J=l TO B(I) 

150 PRINT '■**"; 

160 NEXT J 

170 PRINT 

180 NEXT I 
^■4*190 FOR 1=1 TO G«3 
•1^00 LET I»=INKEYt 

210 IF I«<>"" THEN GOTO 270 

220 NEXT I 

230 PRINT "TOO LATE" 
•■A«240 FOR J=l TO 10 

250 NEXT J 

260 GOTO 280 

270 IF VfiLtI«)=M THEN LET S=S+1 

2SO NEXT G ... 



How the program works 

This sets up B as an "anray 
variable". It can hold five 
different values at a time, 
, identlfriiigtheinasB(l),B(2), 
B(3),B<4)andB<S). 

. Sets opening score at zen>. 

Start of loop for 10 goes. Done 
baclcwaids In this game (i.e. 
G= 10 for fiist go, 9 for the 
second and so on). This 
allows the delay loop In line 
1 90 to give yoa more time for 
the earlier goes. 

Sets nnml>er of highest 
population graph at 1 to start 
with. 

ChfMwes S numbers and puts 
, them In the array B(l)toB(5). 
Checks which is biggest aiid 
changes M to correspond 
wlthlL 



290 PRINT "YOU HIT "fS;" OUT OF lO" 

300 PRINT "HIGH DENSITY TARGETS" 

310 IF S=lO THEN PRINT "YOU'RE A HERO" 

320 IF S<10 THEN PRINT "TOUGH - YOU FAILED 



' Prints the 5 numbers on the 
screen in the form of rows of 
Stan. 



Checks if you are piesBlng a 
' key and goes to 220 if yoa are. 

If you didn't press in dme, 
prints TOO LATE and goes 
■ bacfefornextgo. 

Checks if the key you 
pressed was correct and, if 
' so, increases your score by 1. 

' Goes back for another go. 



330 STOP 

The above listing wUI work on a ZX8 1 . For 
other computers, make the changes below. 

•10,110 HOHE 
A 10, 110 PRINT Cl«»(147) 
**»aO LET B(1)=INT(RNDC1)*10+1) 
■80 LET B(I»=INT(RND(0>»lO+i> 



t 



Prints score after 
10 goes. 



•195 1*="" 

*200 I»=INKEY»(1) 

A300 GET I* 

•200 IF PEEK(-16384>>127 THEN 6£T I» 



• BA»190 for 1=1 TO B«30 



*BA^240 FOR J=l TO 4O0 




Changing the speed of the game 

To give yonnelf more chance of 
pressing a key each time, change the 
last nomber In line 190 to a higher one. 

As your skill Improves, keep 
loweziiig the nniober in line 1 90. How 
low can you go and still win? 



,s.=^«5^-'r 




Puzzle corner 



Can you work out how to make the 
computer give you more than 5 targets 
to choose from each time? 



Iceberg 



Your hull is badly damaged and 
you've no weapons to speak of. As 
you limp slowly home through 
treacherous iceberg-strewn waters, 
you become aware that an enemy 
ship is tailing you. Strangely it can 
detect you but not the icebergs, so 
your best chance is to lure it into 
hitting one. 

Your computer will print a grid 
showing the position of your ship 
(Y), the enemy (Z) and the icebergs 
(*). You can move one space North, 
South, East or West each go. The 
enemy moves towards you by the 
most direct route (it can move 
diagonally too). If you move into any 
of the 8 positions surrounding the 
enemy, you will be captured, and if 
you hit an iceberg you wUl sink. 

Can you escape? 



V ^. 



-i^i 



■.m^rr 



10 PRINT "ICEBERG" 
20 DIM B(8,S) - 



•■a»30 let N=INT(RND»a+4)' 



40 FDR 1=1 TO N 
|S*Ba#50 let B(INT(RKD»8+1>,INT(RND»8+1)>=23 
&0 NEXT I 



#■^•70 LET SX=INT(RND«B-«-l) 
*«A«80 LET SY=INT(RND»a+l> 

90 IF B(SX,SYK>0 THEN BOTO 70 
|si«lrBAtlOO LET B<SX,SY)=63 




*aA«110 LET YX=INT(RND«e+l) 

•■A«i20 LET YV=INT(RND«B+1) 

130 IF B(YX,YYK>0 THEN GOTO llO 

|s*BA#l40 LET BCYX,YY)=62 

A«lSO CLS 

160 FOR V=l TO B 

170 FOR X=l TO B 

180 IF B(X,Y>=0 THEN GOTO 210 

190 PRINT CHR«(B{X,Y) } ; 

200 GOTO 220 

210 PRINT ". "; 

220 PRINT " "; 

230 NEXT X 

240 PRINT 

250 NEXT Y _ 



How the program works 

This sets ap the grid. B ia an 
' "aiTay"wrlthtlieDIM«nsioiis 
8 by 8. 

■ N is the nuinher of Icebergs. 
It varies from 4 to H 
depending on the valae of 
KND. 

23 on ZX8 1 snd 42 on the 
other computers is the code 
for * . Computer loops round N 
tjmes putting * into random 
positions in the grid. 

This puts the enemy ship on 
> the ^d fox the start of the 
game. 63 CZX81 ) and 90 
(otfaezs) axe the codes for Z. 
Cltecks the position has not 
already been given to an Iceberg 
aad finds another if it has. 

• These lines do the same as 
above to pat yon im the grid. 
<82 and 89 are the codes for 



' Prints oat grid with current 
positioBa of ships and 
icebergs. 




Puzzle corner 



Can you work out lutw to make the gxld 
btsgoz? 

Now work out how to add more 
icebergitoo. 





./ 



:'^\ 



260 LET B<YX,VY)=0 



270 PRINT 
280 INPUT 



"DIRECTION (N,S,E,WJ 

D« 



^ 



• ■A' 



290 LET YY=YY+(D»="S" ftND YY08) 

I300 LET YY=YY-(D»="N" AND VYOl) 

I 310 LET YX=YX+<D»="E" AND VXOB) 

320 LET YX-YX-(D»="W" AND YXOl) 



4*330 IF B(YX,YY)=63 THEN 6OT0 500 
^■^•340 IF B(YX,YY)=23 THEN SDTO 600 



°1 



hirt 



IA»350 LET B<VX,VY)=62 
360 LET B(SX,SY)=0 



} 



370 LET SX=SX+SeN{YX-SXS 
3B0 LET SY=SY+SGN(YY-SY) 



i} 



Is^BAes^O 



IF B<SX,SY)=62 THEN 60T0 500 
IF B(SX,SY)=23 THEN 60TD 700 






s*BAe4I0 LET B<SX,SY)=&3 



420 GOTO 150 ' 



SOO PRINT "YOU'VE BEEN CAUBHT" 

SIO GOTO 800 

600 PRINT. "YOU'VE HIT AN ICEBERG" 

610 GOTO 800 

700 PRINT "YOU'RE SAFE - HE'S HIT 

800 STOP 

The above listing will work on a ZX8 1 . For 
other computers) make the changes below. 

♦ a*30, 50, 70,80, 110, 120 change RND ta 
■30,50,70,S0,1I0, 120 change RND to 
•50,340,400 change 23 to 42 
!*• 100,330,410 change 63 to 90 
l*ei40,350,3'?0 change 62 to B9 
*150 PRINT CHR*<147)s 
•150 HOKE 
f290 LET YY=YY-(D«="S" AND YYOB) 
^_.l300 LET YY=YY+(D«="N" AND YYOl) 
"^■1310 LET YX=YX-eD«="e" AND YX<>a> 
L320 LET YX=YX+tD»="W" AND YXOl) 



• Clean roar cturent position 
from the grid bo you can 
ipedfy a new one. 

■Puts your direction in DS. 

Calculate* your new 
position, checking that you 

- dont go over the edge of the 
grid. 

Checks your new positioji to 
see If yon have bumped into 
■• the enemy ship oi an iceberg. 
If yon have, it jiunps down the 
program to telJ you. 

Yon Ve moved to a safe 
. position and the code for your 
ship is put there. 

■ CalcolatsB the enemy's new 
position. 

Checks enemy's new position 

- to see if he has caught you or 
hit an iceberg. Jumps down 
program to teU you if he has. 

- Enemy's code is put in the 
new position. 

■ End of a turn. Loops back to 
15D to start another turn. 



or-E" 



Computers can decide 
whether an expression is true 
or false. If the answer is false 
they give it the value 0. If it 
is true, some computers give 

RND ( 1 J [the value + 1, others - 1. 

RND CO] I Lines 290-320 have to be 

changed for some computers ] 
.because of this. 



The Wizard's Wall 



The wall the Wizaxd built to surround his secret stronghold is no ordinary 
wall. The stones in it are people, petrified by the Wizard's angry stare, and, 
what's more, it can move. If you can break a hole through it with your trusty 
catapulto which fling gigantic boulders, you will destroy the Wizard's 
magic powers and turn the stones back into people again. There are 
problems though - the Wizard is working on a spell which stops missiles in 
mid-air and sends them back where they came from. Sometimes he can 
make it work. . . 

If you don't succeed, you will become just another stone in the Wizard's 
Wall!!!! 






4 



^m^^ *«io cLs 


jty^;* 20 PRINT "WIZARD'S WALL" 


j^gj 30 PRINT 


■n| 40 PRINT "DO YOU WANT ANY HELP?" 


WKS ^^ INPUT 1$ 


jUJiBM ^■A«60 ] 


EF I«(1>="Y" THEN GOSUB 740 


MUB 70 PRINT "DIFFICULTY?" 


HH 80 PRINT "(5=EASY, 1=DIFFICULT) " 


bSR '^^ ^ 


[NPUT Q 


PP[^M 100 


DIM W<8,e) 


mbMI 110 


DIM E(B) 


^^^fl 


FOR Y=l TO 8 


^^^1 


FOR X=l TO 4 


jHH •■AS140 


LET W(X,Y>=20 


SBV ^^^ 


NEXT X 


Rap^ 160 


NEXT Y 


flp:^ 1 70 


LET Z=0 


^^tM ^^^ 


FOR C=l TO 3 


ywhSj 190 


LET D=INT(RND*S0+21J 


V .'^'Sj 20O 


GOSUB 430 


J 210 


IF Z=l THEN GOTO 1150 


^H 220 


PRINT "YOU ARE "iDj" YARDS AWAY" 


^^H itUA92ZO 


LET W=INT(RND*41>-20 


H^H 240 


IF W=0 THEN PRINT "NO WIND" 


^S^H 250 


IF W<0 THEN PRINT "WIND TO RIGHT" 


^^^1 260 


IF W>0 THEN PRINT "WIND TO LEFT": 


^^^1 270 


PRINT "GIVE ELEVATION (1-90)" 


^^^B 


INPUT A 


^H|fl 290 


PRINT "GIVE SPEED" 



w^ 



'^,- 



Pi4- 






3O0 
310 
320 
330 
340 
350 
360 

•■a«370 
380 
390 
400 
410 
420 

*BA«430 
440 
A«4S0 
460 
470 
480 

•■A»490 
500 
510 
520 
530 
540 
550 
560 

*"A»570 

*1A»580 

590 

too 

1^BA«610 

620 
630 
640 
650 
660 
670 
680 
690 
7O0 
710 




'-i'^'-f-^ 



INPUT V 

LET A=fi/180»3. 1416 

LET H=TAN(A>*(D-W)-(5*(D-W)'^2)/<V*COS<A) ) 

LET H=1NT(H/Q> 

IF H>0 AND H<9 THEN GOSUB 540 

IF H<1 THEN PRINT "SHOT WAS TOO NEAR" 

IF H>8 THEN PRINT "SHOT WAS TOO FAR" 

IF RND>.2 THEN GOTO 200 

PRINT "THE WALL HAS HOVED " 

NEXT C 

PRINT "YOU HAVE BEEN TURNED" 

PRINT "INTO STONE" 

STOP 

FOR 1=1 TO 30 

NEXT I 

CLS 

PRINT 

FOR Y=8 

FOR X=l 












TO 
TO 



STEP -1 



PRINT CHRt(W(X,Y>)i 

NEXT X 

PRINT 

NEXT Y 

RETURN 

GOSUB 650 

LET W(E(H>-1,H)=0 

IF V*C0S(A)>50 THEN LET W (E CH) -2,H) =0 

IF RND>.5 AND HOI THEN LET W(E(1),1)=29 

IF RND>.5 AND H>5 AND H<B THEN LET 

W(E(H+1)-1,H+1)=0 

IF H>1 THEN GOTO 630 

FOR Y=2 TO 8 

IF RND<.5 THEN LET W (E (Y) -1 , Y> =0 

NEXT Y 

GOSUB 650 

RETURN 

FOR Y=i TO a 

LET X=l 

IF W(X,Y>=0 OR X=a THEN GOTO 700 

LET X=X+1 

GOTO 670 

LET E(Y)=X 

IF X=l THEN LET 2=1 
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The Wizard's 

720 NEXT Y 
730 RETURN 
740 PRINT 
750 PRINT 
760 PRINT 
770 PRINT 
780 PRINT 
790 PRINT 
BOO PRINT 
810 PRINT 
820 PRINT 
830 PRINT 
840 PRINT 
850 PRINT 
860 PRINT 
870 PRINT 
880 PRINT 
890 PRINT 
900 PRINT 
910 PRINT 
920 BOSUB 
930 PRINT 
940 PRINT 
950 PRINT 
960 PRINT 
970 PRINT 
9SO PRINT 
990 PRINT 
1000 PRINT 
1010 PRINT 
102O PRINT 
1030 PRINT 
1040 PRINT 
1050 PRINT 
1060 PRINT 
1070 PRINT 
lOBO PRINT 
1090 GOSUB 



Wall continued 



YDU ARE ATTACKING THE" 
'LAST STRONGHOLD OF THE" 
'NOTORIOUS WIZARD, WHO" 
'IS HIDDEN BEHIND AN" 
'ENDLESS STONE WALL," 
'EACH STONE BEING ONE" 
'OF HIS FORMER VICTIMS." 
'ONLY YOU CAN ATTACK," 
'AND FREE THEM FROM" 
'HIS MABIC. " 
'YOU MUST DESTROY THE" 
'WALL USING CATAPULTS, " 
'BUT BEWARE, THE WIZARD" 
'HAS THE POWER TO MOVE" 
'THE WALL BACK AND" 
'FORTH, AND OCCASIONALLY," 
'TO DEFLECT YOUR SHOTS" 
'BACK AT YOU. " 
.110 

■AFTER EACH SHOT, YOU ARE" 
'SHOWN A CROSS-SECTION" 
■OF THE WALL, SHOWING" 
■HOW MUCH DAMAGE THERE" 
■IS. " 

■NOTE THERE ARE CERTAIN" 
■KEY STONES THAT PRODUCE" 
■■LOTS OF DAMAGE, AND" 
■■ALSO, THE FASTER THE^' 
"BOULDER IS MOVING" 
"HORIZONTALLY, THE MORE" 
"DAMAGE IT WILL CAUSE." 
"CAN YOU DEFEAT THE^' 
"WIZARD IN TIME TO SAVE" 
"THE THOUSANDS OF TRAPPED" 

■■ SOULS " 
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IIOO 
lllO 
4-A*1120 
A»1130 
1140 
1150 
1160 
1170 

iiao 

1190 
1200 



RETURN 

PRINT "PRESS A KEY "; 

IF INKEY«="" THEN GOTO 

CLS 

RETURN 



1120 



PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
STOP 



"YDU MANAGED TO BREAK" 
"A HOLE IN THE WIZARD'S" 
"WALL - YDU HAVE BEATEN" 
"HIS MAGIC POWERS, AND" 
"FREED HIS VICTIMS." 



.ri 



'.■'.V. «^J 






The above listing will work on a ZX81 . For 
other computers, make the cbanges below. 



■all RND to RNDtO) 
*A*all RND to RND(1> 

•10,450, 1130 HOME 

A 10, 450, 1130 PRINT CHR*<147>; 
•■A»60 IF LEFT*(I«, 1)="Y" THEN GOSUB 740 
•■A»140 LET W(X,Y}=29 
■a«430 FDR 1=1 TO 200 

*430 FDR 1=1 TO lOOO 
•■A«490 PRINT CHR*(W(X,Y>+32>; 

•1120 It=GET* 

•1120 GET I* 

A1120 GET I« : IF 1*="" THEN GOTO 1120 
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Changes you can make to the game 






You can make the wall thicker by changing the following lines: 

Line 100: change the first number to a higher one, say, 10. 

Line 1 30: subtract 4 from the number you used in line 100 and put the 

answer at the end of line 120. (i.e. in this case use 6.) 

Line 480: change the last number to the number you used in line 100 (1 

again in this case). 

If you make the wall much thicker, you will probably need more time. 
Change the last number in line 180 to a higher number to do this. 
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Missile! 



This game is different from the 
others in this book because it uses 
graphics. As the computers vary so 
much in the way their graphics 
work, there is a separate r rogram 
for each one. Read the instructions 
on this page for how to play the 
game and then look through the 
pages that follow for the version for 
your computer. 



How to play Missile! 

You have three missile bases, each 
capable of launching one missile. 
When you see a plane approaching, 
you must judge its height and speed 
and fire your missiles at it one by 
one. 

Your missiles are launched by 
pressing any key. The first time you 
press launches the left-hand one, 
second time the middle one and 
third time the right-hand one. 

See how many enemy planes yon 
can shoot down. 



Missile! : TRS-80 version 



_ 10 CLS 320 RE 

I 20 DIM Y(3),F(3) 400 FOl 

j 30 N=l 410 SE 

I 40 PS=INT(RND^O)*3+l> 420 SE 

I 50 P=INT(RND(0)*36+5) 430 NE 

[ 60 GOSUB 400 440 RE 

I 70 FOR I=PS TD 100 STEP PS 

I SO GOSUB 300 

[ 90 F*=INKEY* 

I 100 IF F«="" OR N>3 THEN 130 

I 110 F(N>=1 

j 120 N=N+1 

I 130 FOR J=l TO 3 

I 140 RESET ( 32* J,46-Y(J) ) 

I 150 IF F(J>=0 OR Y{J>>45 THEN IS'O 

I 160 Y(J)=Y(JH-1 

■ 170 IF P0INT(32*J,46-Y(J> > THEN 230 
j IBO SET (32*J,46-Y(J) ) 

! 190 NEXT 

I 200 NEXT 

I 210 PRINT eo, "MISSED" 

j 220 END 

I 230 PRINT @0, "HITM ! " 

■ 240 END 

300 RESET (I-PS,P> : RESET CI-PS+1,P) 

! 310 SET (I,P) : SET (I+1,P> 



320 RETURN 

400 FOR J=l TO 3 

410 SET (J*32,47) 

420 SET (J*32+l,47) 

430 NEXT 

440 RETURN 



Missile!: BBC version 



10 MODE 5 

20 VDU 23,?24, 224, 160, 144,144,143,128, 128,255 

30 VDU 23,225,0,0,0,0,240,12,: . 

40 VDU 23,226, 16,56,84, 16, 16, 16, 0,0 

50 VDU 23,227,0,0,0,8,8,8,8.60 

60 DIM Yt3J ,F(3) 

70 N=1:M5=16 

80 PS=RND(20)+10 

90 P=RND<500)+400 

100 PRDCDISPLAY 

110 FOR I=PS TO 1100 STEP PS 



120 PROCPLANE(I-PS.P,0> : PROCPLANE t I , P, 3> 

130 F4=INKEY*(0> 

140 IF F*="" OR N>3 THEN 170 

150 F(N>=TRUE 

160 N=N+1 

170 FOR J=l TO 3 

180 IF NOT F(J> THEN 240 

190 PROCMISSILE(J,0> 

200 Y<J>=Y(J)+MS 

210 IF Y(J)<1024 THEN PROCMISSILE ( J , 3> 

220 X=J*320-I : Y=Y(J)+32-P 

230 IF X<12a AND X>-40 AND Y>-32 AND Y<2 THEN 280 

240 NEXT 

250 NEXT 

260 CLS : PRINT "MISSED!!!!" 

270 END 

280 PROCPLANE(I,P, 1> : SOUND 0,-15,5,20 

290 END 

300 DEF PRDCPLANE(X,Y,C> 

310 GCOL 0,C 

320 MOVE X,V 

330 VDU 5,224,225,4 

340 ENDPROC 

350 DEF PROCMISSILE (N,C) 

360 GCOL 0,C 

370 MOVE 320*N,32+Y(N) 

380 VDU 5,226,4 

390 ENDPROC 

400 DEF PROCDIBPLAY 

410 FDR 1=1 TO 3 

420 MOVE 1*320,32 

430 VDU 5,227,8,226,4 

440 NEXT 

450 ENDPROC I 



Missile! : ZX Spectrum version 



127,63 
510 DATA 0,252,i?a2,252, 
255,255,254,232 



10 CLS 460 FDR j=l TO 

15 INVERSE O 470 PRINT AT 21 , 8* j ; " [AB3 ' 

20 DIM y(3) 480 NEXT j 

30 DIM ^^(3) 490 RETURN 

40 LET n=l 500 DATA 0,0,0,0,255,255, 

50 LET ms=8 127,63 

60 LET p5=INT(RND*6+5) 510 DATA 0,252,2^2,252, 

70 LET p=INTtRND«140+20> 255,255,254,232 

80 GOSUB 400 

90 FOR i=pB TO 240 STEP ps 

100 LET c=l : LET x=i-ps 

110 GOSUB 300 

120 LET c=0 I LET K=i 

130 GOSUB 300 

140 LET f«-INKEY« 

150 IF ft="" OR n>3 THEN GOTO 170 

160 LET f (n>=l : LET n=n+l 

170 FDR j=l TD 3 

IBO LET c=l : GOSUB 350 

190 IF ^^(j>=0 OR y(j)>14S THEN GOTO 240 

200 LET y<j>=y(j>+ms 

210 LET c=0 s GOSUB 350 

220 LET >4 = j*64-i : LET y=p-y(i) 

230 IF >{>-l AND >;<12 AND y<10 AND y>-5 THEN GOTO 280 

240 NEXT j 

250 NEXT i 

260 PRINT AT 0,0; "Hissed" 

270 STOP 

280 PRINT AT 0,0;"Hit!M" 

290 STOP 

300 INVERSE c 

310 PLOT x,p 

320 DRAW 0,e : DRAW 3,-6 

330 DRAW 8,0 : DRAW 2,-2 

340 DRAW -13,0 : RETURN 

350 INVERSE c 

360 PLOT 64*J+4,Y<J )+4 

370 DRAW 0,6 : DRAW -2,-2 

380 DRAW 2,2 : DRAW 2,-2 

390 RETURN 

400 FOR a=65 TO 66 

410 FOR b=0 TO 7 

420 READ c 

430 POKE USR CHR*(a)+b,c 

440 NEXT b 

450 NEXT a 
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Misstte! : VIC 20 version 

lO PRINT CHR*(147)CHR*(5); 

20 POKE 36879,8 

60 DIM Y<3> ,F(3> 

70 N=liMS=2 

90 P=INT(RND(l)«9+2)»2 

no FOR 1 = 1 TO 21 STEP RND(i>/2+.5 

120 eOSUB 300 

130 GET F* 

140 IF F*="" OR N>3 THEN 170 

150 F(N>=-1 

160 N=N+1 



FOR J=l TO 3 

IF F(J)=0 THEN 220 

POKE 8164+J*5-Yia>*22,32 

IF Y<a>=22 THEN 240 

Y(J>=Y(J)-H 

POKE 81&4+J«5-Y(J>«22,30 

IF ABS(I-J»5><=i AND P=Y(J) THEN 280 

NEXT 

NEXT 

PRINT CHR* < 147> ; "MISSED ! ! f ! " 

END 

PRINT CHRt(147>; "HIT! ! ! ! " 

POKE 36877,220 : POKE 36878,15 

FOR K=l TO 500 : NEXT 

POKE 36877, O : POKE 36878,0 

END 

POKE 8163+I-P»22,32 

POKE ai64+I-P«22, 121 

RETURN 



Special note for Spectrum users: 

The convention used -for showing graphics 

characters in a PRINT statement 'is as follows: 

The character C means press the GRAPHICS 

key once. Then type the following letter 

keys (shifted far the ZX81). Press the 

GRAPHICS key again when ] is shown. 



Missile! : Apple version 



10 HOME 

20 HGR 

30 HCDL0R=3 

40 DIM Y(3) ,F(3> 

50 N=l : MS=5 

hO PS=INT(RND(n*6+4> 

70 P=INT(RND{U*13S+11) 

SO GDSUB 400 

90 FOR I=FS TO 265 STEP PS 

100 X=I-PS : Y=1S9-P : C=0 : GOSUB ; 

110 X=I : C=3 : GOSUB 300 

120 F*="" : IF PEEK <-l 6384) : 127 THEN GET F* 

130 IF Ft="" OR N>3 THEN 160 

140 F<N)=1 

150 N=N+1 

160 FOR J-l TO 3 

170 C=0 : GOSUB 350 

180 IF F(J)=0 OR Y(J)>145 THEN 230 

190 Y(J)=Y(JH-MS 

200 C=3 : BOSUB 350 

210 X=J#70-I : Y=P-Y(J> 

220 IF X>-1 AND X<15 AND Y>-9 AND Y<5 THEN 270 

230 NEXT 

240 NEXT 

250 VTAB 22 : PRINT "MISSED" 

260 END 

270 VTAB 22 : PRINT "HITM!" 

280 END 

30O HC OLOR=C 

310 HPLDT X,Y TO X,Y-a 

320 HPLOT TO X+3, Y-2 : HPLOT TO X+12,Y-2 

330 HPLOT TO X+14,Y : HPLOT TO X,Y 

340 RETURN 

350 HCOLOR=C 

360 HPLOT 70*J, 158-Y(J) TO 70*J, 154-Y ( J> 

370 RETURN 

400 FOR J=l TO 3 

410 HPLOT 70*J-5,159 TO 70* J +5, 159 

420 NEXT 

430 RETURN 



PRINT "HIT! ; 
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THEN GOTO 140 



Missile! : ZX81 version 

10 CLS 

20 DIM Y(3) 

30 DIM F(3> 

40 LET N=l 

SO LET P=INT(RND*19+2)»2 

60 FOR 1=1 TO 48 

70 PLOT I,P 

80 PLOT I+1,P 

90 UNPLOT I-1,P 

lOO LET B*=INKEY* 

110 IF B*= " " OR N >: 

120 LET F(N>=1 

130 LET N=N+1 

140 FOR J=l TO 3 

150 IF F(J)=0 THEN GOTO 190 

160 UNPLOT J*16,Y<J> 

170 IF Y(J)=42 THEN GOTO 210 

180 LET YCJ)=Y(J)+i 

190 PLOT J*16,Y(J) 

20O IF P=y(j) AND (J*16=I OR J*16=I+1) 

THEN GOTO 260 
210 NEXT J 
220 NEXT I 
230 CLS 

240 PRINT "MISSED" 
250 STOP 
260 CLB 

270 PRINT "HIT" 
280 STOP 
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Adding to the programs 



Hex« are some ideas for additions 
you can make to the programs in 
this book or to your own programs. 
In most cases you won't be able to 
add these to a ZX81 with only IK as 
the games themselves fill almost all 
its memory space, but you should 
find there is plenty of room on the 
other computers. 

Remember you will either have to 
restrict your additions to the spare 
line numbers in a program or 
renumber the program. If you 
decide to renumber, take care you 
change all the GOTO and GOSUB 

lines too. 

■ 

Getting the computer to tell you 
how to play 

You can add a 

section to any 

program to make 

the computer print 

instructions telling 

you what to do. The 

easiest way to do 

this is to add some lines, such as those 

below, at the beginning of the 

program and then put a sub-routine at 

the end. 



10 PRINT "TITLE OF 6AHE" 

11 PRINT "DO VDU WANT TO" 

12 PRINT "KNOW HOW TO PLAY?" 
15 INPUT I* 

S2X17 IF I»(1)="V" THEN BOSUB lOOO 
•■A»17 IF LEFT*<I*, 1)="V" T)-CN GOSUB lOOO 

main program goes here 

lOOO PRINT "WHAT YOU HAVE TO" 

lOlO PRINT "DO IS " 

19V9 RETURN 

You can add as many print statements 
as you like for the instructions, just 
remember to put a number and the ^ 
word PRINT at the beginning of each *i 
one. Restrict the length of the part 
inside the quotation marks to the 
number of characters your computer 
can print on one line. Don't forget to 
put a RETURN line at the end or the 
36 program won't work. 




Making the computer 
stop and waitfor you Tronic 

If your instructions are very long, you 
may want to insert this sub-routine 
which stops the program running at a 
particular point until you press a key. 
This way you can stop the instructions 
scrolling off the top of the screen 
before you have read them. Put a 
GOSUB line at the place you want the 
program to stop and then put this sub- 
routine at the end. 




JOOO 


PRINT "F^ESS 


A 


KEV TO CONTINUE " 


szxioio 


IF INKeY«="" 


THEN 


GOTO 


lOlO 




•lOlO 


r*=GET* 












«ioio 


GET 1* 












AlOlO 


GET I« ! IF 


\%- 


= "" 


THEN 


GOTO 


lOio 


^ 1020 


PRINT 












I 1030 


RETURN 













Making the computer "talk" to 
you 




You can make the computer ask you 
questions and react to yoiu: answers. 
For instance, here is an addition which 
wiU make the computer refuse to play 
with you unless your name begins with J. 

1 PRINT "WHAT IS VOUR NW1E?" 

2 INPUT I* 

3 IF I»(1K>"J" THEN GOTO 1000 

3 IF LEFT»(1», 1K>"J" THEN GOTO 1000 

4 PRINT "DK-YOU CAN PLAY." 

5 PRINT "ARE YOU READY?" 
b INPUT J» 

ZX7 IF J»(1><>"Y" THEN GOTO 5 
^•7 IF LEFT*(J*, 1)<>"Y" THEN GOTO 5 



main program here 



iOOO PRINT 
1010 PRINT 
1020 PRINT 
1030 PRINT 



"SORRY THIS GAI^ 
"ONLY FOR PEOPLE" 
"WHOSE NAMES BEGIN 
"WITH J" 



IS" 



Here is another one where the 
computer dares you to be brave 

enough to play. 

10 PRINT "VERY SCAREY GAME" 

12 PRINT "ARE YOU BRAVE ENOUGH" 

14 PRINT "TO TACKLE THE GREEN" 

15 PRINT "HfilRY MONSTER?" 
lA INPUT I» 

S ZX17 IF I*(1>="Y" THEN GOTO 20 
•kUAmiV IF LEFTtd*. I)="V" THEN 60T0 20 
IB PRINT "COWARD" 

19 STOP 

You could combine this with the 
instruction sub-routine by taking lines 

11 to 17 from the instructions section 
on this page and putting them at lines 

20 to 26 of this program. You can then 
start the main program at line 30 and 

add the instruction sub-routine at the 
end. 



cases you can add a single line to your 
program at the place you want the 
sound. In others, you need several 
lines and it is best to put these in as a 
sub-routine. 

As an example, here is the sotmd of 
a shot for the BBC. You can experiment 
with where to put it in the program, but 
you must give it a line number to make 
it worU ; 

SOUND 0,-15,5, 10 

At the back of the VIC manual ybu 
will find some useful sub-routines for 
sounds such as "laser beam", 
"explosion" and "red alert". Put a 
GOSUB line where you want the sound 
to appear, number the sub-routine and 
add a RETURN at the end of it. 



Would vou like another go? 

Instead of typing RUN each time you 
play a game, you can make the 
computer ask you if you'd like another 
go. Put these lines at the end of the 
program, just before the last STOP 
statement. 



lOOO PRINT "DO YOU WANT ANOTHER GO?" 
1010 INPUT I* 
S ZX1020 IF I«(1)="V" THEN RUN 
1h«A*1020 IF LEFT«tI»,l)="V" THEN RUN 
1030 PRINT "OK THEN - BYE" 
1040 STOP 



t^- '■'•'^ 




Change line 
numbexs according 
to your program. 



Adding sound effects 



The BBC, VIC 20, ZX Spectrum and 
some Apples are able to produce 
sounds and you can add lines to your 
programs to make them do so at 
appropriate places. You could add an 
explosion for instance, or a little tune 
which plays if you win. All the 
computers need different instructions 
to make sounds though, so you will 
have to look at your manual. In some 




Special note for BBC and .^ 
Spectrum users '^^ 

If you have a BBC or a ZX Spectrum 
you may find that some of the games 
in this book run too fast for you. You 
will find a box next to these games 
containing instructions for 
changing the speed. Remeinber, to 
slow the game up you always need 
to use a higher number. Later 
models of the BBC may run up to 
twice as fast as the earlier models, 
and this could make the games 
appear impossible on the first nm. 
Be prepared to make big changes 
to the speed number to correct this. 
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Writing your own programs 

As you work through the games in 
the book, you will probably find 
yourself making more and more 
changes to them and eventually 
wanting to write new games of your 
own. On these two pages you will 
find some hints on how to set about 
doing this. 

Before you start, it is a good idea to 
stop and think about what your 
computer can and cannot do. 




* It can ask you for information. 




' It can store information 



* It can select numbers at random by 
using RND. 




'It can do calculations. 



* It cannot do anything unless you tell it 

to. 



*It can make decisions by comparing 
items of information in various ways. 





* It can tell you the results of its 
calculations and decisions and also 
38 what is stored in its memory. 



*Provided you use its language 
correctly, it can do only exactly whax 
you tell it, even if it is silly. 

Remember, when you are trying to 
work out a game, notto include 
anything which your computer won't 
be able to do. 



Planning a game 

Before you can tell the computer how 
to play your game, you must know 
exactly how to play it and what the 
rules are yourself. The computer will 
need a series of simple logical 
instructions, so work out your game in 
yoiu: head or on paper first and then 
break it down into simple steps. 

Next write a plan (in English - don't 
try to use BASIC yet) of all the stages of 
the game in order. 

Here is a plan for a simple shooting 
game, such as firing cannon balls at a 
pirate ship or shooting laser beams at 
an alien invader, to give you an idea. 



PLAN 

;/) PniNTriTLemo 
(NSTffucnows 

2) CHOOSE A TARCET 
FOR THIS OAtAe 

3)Be<HN A LOOP TO 
<^IVE THE PLAYER 

N Goes 

4-) C,ET A SHOT FROM 

THE Player 

5) CHECI^ IF S.mT WA$ 

ON TAHdET 

6) PRINT M£SSA*;e 
DEPENOINC ON 

Accuracy OIF SHOT 

l) <fO 6ACK FOR 

ANOTH6R qo \F SHOT 
WAS UNSUCCESSFUL 



Writing the program 

The next stage is to convert your plan 
into BASIC. Each step in your plan may 
need several hues in BASIC. Don't 
forget to leave gaps when numbering 
your program lines so you can go back 
and add extra ones if you need to. 

Do a first draft of the program on 
paper first and then start testing on the 
computer. Your computer will spot 
errors much more quickly than you 
will see them yourself and may give 
you a clue as to what is wrong. 
Remember that debugging programs 
is a long, tedious process even for 
expert programmers, so don't expect 
to get yours right first time. 





Once you have got the core of the 
program working, you can add to it. 
Scoring, extra comments, more 
targets etc. can all be incorporated 
later. You could add sections from the 
programs in this book to your games. 

Don't expect to be able to write 
exciting and original games straight 
away. Keep your ideas very simple 
and be prepared to.adapt them as you 
go along. You may find you have 
included something in your game 
which is easy for humans to do but 
very difficult for a computer. As you 
get more experienced you will begin 
to know instinctively what your 
computer can do and find it easier to 
write programs for it. 
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Summary of BASIC 



Hue section lists some coirunon BASIC words and describes what they 
make the computer do and how they are used. Most of them have been used 
in the programs in this book, so you can check back through the book to see 
how they work in a game. Not all the words can be used on all the 
computers mentioned iii this book. The conversion chart on page 46 shows 
what you can use instead. 



LET tells the computer to label a section of its 
memory and put a particular value in it e.g. LET 
A= 6 means label a section of memory "A" and put 
the value 6 in it. "A" is called a "variable" and putting 
something in it is called "assigning a value to a 
variable". 

Some variable labels are followed by a dollar 
sign e.g. A$. This means they are for "strings", 
which can contain any number of characters, 
including letters, numbers and symbols. 



PRINT tells the computer to display things on the 
screen and you can use it in several ways: 

A message enclosed in quotation marks with 
PRINT in front of it will be displayed on the screen 
exactly as you typed it. The section inside quotes 
does not have to be in BASIC, it can be anythingyou 
bke. 

PRINT followed by a variable label e.g. PRINT A 
or PRINT A$ tells the computer to display the 
contents of that variable on the screen. 

PRINT can also do calculations and then display 
the results e.g. PRINT 6*4 will make the computer 
display 24. 

You can use PRINT by itself to leave an empty 
line. 



RND tells the computer to choose a number at 
random. Different computers use different forms of 
RND and you can see what these are in the 
conversion chart on page 46. On Sinclair computers 
by itself produces a number between and 

99999999. You can vary the limits of the number it 
'chooses by multiplying RND and adding to it. E.g. 
RND * 20 produces a number between and 
19.99999999, while RND*20+ 1 produces anumber 
between 1 and 20.99999999. 

See INT for how to produce only whole numbers. 

See CHR$ for how to produce letters and other 
keyboard characters at random. 





INT is short for integer, which means whole 
number. For positive ntunbers, it tells the computer 
to ignore everything to the right of the decimal 
point. E.g. INT(20.999) is 20, For negative numbers, 
it ignores everything to the right of the decimal 
point and "increases" the number to the left of it by 
one e.g. INT( - 3.6) is -4. 

INT is often used with RND, like this: 
INT(RND * 20 + 1) which tells the computer you want 
it to choose a whole number between 1 and 20. 

CHR$ converts numbers into letters. Apart from the 
ZX8 1 , all the computers in this book use the 
ASCII * set of keyboard characters in which each 
character corresponds to a certain number. E.g. 
letter A has the code number 65 and PRINT 
CHR$(65) will display an A on the screen. 

You can use CHR$ with INT and RND to make the 
computer select random letters, like this: 

CHR$(INT(RND*26+65)) 
This line will produce random letters on a ZX 
Spectrum (see conversion chart for other 
computers). 




FOR is used to start a "loop" which will make the 
computer repeat part of a program a certain 
number of times. It must be followed by a variable 
(such as G to stand for the number of goes allowed 
in a game), and the variable must be given start and 
end values (such as I TO 10.) 

The end of the loop is marked by a NEXT line 
(NEXT G in this example) which increases the value 
of the variable by 1 each time and then sends the 
computer back to the FOR line again. When the 
variable reaches its end value, the computer 
ignores the NEXT line and carries on to the line 
which follows it. Every FOR must have a NEXT or 
you will get a bug. 

INPUT labels a space in the computer's memory, 
prints a question mark and then waits for you to 
type something which it can put in this memory 
space. It will not carry on with the rest of the 
program until you press RETURN, ENTER or 
NEWLINE. 

You can use number or string variables with 
INPUT, but if you use a number variable the 
computer will not accept letters from you. 
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INKEY$ checks the keyboard to see if a key is 
being pressed and if so which one. It does not wait 
for you to press a key like INPUT does. It is usually 
used in a loop which makes the computer go round 
checking the keyboard lots of times. This is 
because computers work so quickly, you wotildn't 
have a chance of pressing a key in the time it takes 
the computer to do one check. 

If you haven't pressed a key before the loop 
finishes, the computer carries on with a string 
containing nothing (called a "null" string). 
NB Apple and VIC do not use INKEY$. 



GET is used instead of INKE Y$ on VIC and Pet 
computers. 



GOTO makes the computer jump up or down the 
program ignoring the lines in between. You must 
put the number of the line you want it to jump to 
after the GOTO instruction. 



GOSUB tells the computer to leave the main 
program and go to a sub-routine. GOSUB must be 
f olowed by the number of the first line of the sub- 
routine. At the end of the stib-routine you must have 
a RETURN line. This sends the computer back to 
the main program to the line immediately following 
the GOSUB line. A GOSUB without a RETURN in a 
program will give a bug. 



IF . . . THEN tells the computer to decide if an 
expression is true or false, and do different things 
depending on the answer. It is used with the 
following signs, and also with AND or OR: 

=the same as 

<lessthan 

>greater than 
< = less than or the same as 
> = greater than or the same as 
< > not the same as 

If the computer decides an expression is true, it 
carries on to do the instruction which follows 
THEN. If it decides it is false, it ignores the rest of 
that line and goes on to the next one. 



CLS is used to clear everything off the screen 
without removing or changing anything in the 
memory. It is usefiil for removing the listing from 
the screen at the beginning of a RUN or in games 
when you want the player to react to something 
seen for a limited amount of time. (NB Apple and 
VIC do not use CLS - see conversion chart). 




HOME is used by Apple computers instead of CLS 
to clear the screen, 



ABS ignores plus and minus signs in front of 
numbers and takes their "absolute" values. E.g 
ABS( - 10) is 10 and ABS( + 10) is also 10. 




VAL takes the numeric value of numbers written as 
strings. In effect, it tells the computer to ignore the 
dollar sign and treat the string as an ordinary 
number variable. E.g. if I$= "60" then VAL(I$) is the 
number 60. 




ASC converts a character into its ASCII code 

number e.g. ASC("3") gives SI. The expression in 

brackets must be a string e.g. ASC(A$) or 

ASC("20"). 

NB ZX8 1 and ZX Spectrum do not use ASC, though 

the Spectrum does use the ASCII code. 



CODE is used by ZX8 1 and Spectrum in place of 
ASC, Like ASC it must always be followed by a 
string. Remember that the ZX8 1 uses different code 
numbers from the other computers. 



TAB moves the cursor across the screen to a 
specified column number. It is usually used with 
PRINT to display something in the middle of the 
screen. The number of spaces you want the cursor 
moved is put in brackets after TAB. The maximum 
number you can use depends on the screen width 
of your computer. 



cmRxI 









SGN tells the computer to find out the sign of a 
number. It produces - 1 for a negative number, 
for zero and + 1 for positive nvimbers. E.g. 
SGN( - 30) is - 1, SGN(7) is + 1 and SGN(O) is 0. 

DIM tells the computer how much memory space 
will be needed for an "array" (a row or a grid). E.g. 
DIM X(6) tells the computer to set aside an area 
large enough to contain a row of 6 elements and 
labelled X. DIM A(8,8) means a memory space 
labelled A and big enough to take 8 elements 
across and 8 down is needed. The number of 
elements of data used in the program must 
correspond to the numbers in brackets after DIM 
or you will get a bug. 

SQR takes square roots of numbers. E.g. SOR( 16) 
gives the answer 4. 

SIN calculates the sine of an angle. In aright-angled 
triangle the length of the side opposite an angle, 
divided by the length of the Hypoteneuse (the side 
opposite the right angle) is the sine of that angle. 
When you use SIN in a program, the angle you are 
using it with must be measured in radians, not 
degrees. 

ATN is one of the trig, functions which computers 
can calculate (see also SIN above). It stands for 
arctangent and it is important to remember that it 
gives an answer in radians, not degrees. You will 
need to use a maths book to find out how this works 
if you do not already know about it, 

STOP tells the computer not to go any further ina 
program. Computers other than the ZX8 1 can use 
END instead. 

PEEK is a way of finding out what is in a specific 
area of the computer's memory. You need to use it 
with a number which specifies an "address" in the 
memory. 

NB not used on BBC. 

POKE is a special way of putting information in the 
computer's memory by using a memory "address'. 
NB not used on BBC. 



ASCII chart 








ZX81 code chart 






Code 
number 


ASCII 
chaiacter 


Code 
number 


ASCII 
character 




Code 
number 


ZX81 
character 


Code 
number 


ZX81 
character 


32 


space 


62 


> 


11 


11 


41 


D 


33 


r 

* 


63 


O 


12 


£ 


42 


E 


34 


If 


64 


@ 


13 


$ 


43 


F 


35 


# 


65 


A 


14 




44 


G 


36 


$ 


66 


B 


15 


7 


45 


H 


37 


% 


67 


C 


16 


( 


46 


I 


38 


& 


68 


D 


17 


) 


47 


T 


39 


f 


69 


E 


18 


> 


48 


K 


40 


( 


70 


F 


19 


< 


49 


L 


41 


) 


71 


G 


20 


= 


50 


M 


42 


* 


72 


H 


21 


+ 


51 


N 


43 


+ 


73 


I 


22 


— 


52 


O 


44 


) 


74 


J 


23 


* 


53 


P 


45 


~ 


75 


K 


24 


I 


54 


O 


46 


, 


76 


L 


25 


1 


55 


R 


47 


/ 


77 


M 


26 


I 


56 


s 


48 





78 


N 


27 




57 


T 


49 


1 


79 





28 





58 


U 


50 


2 


80 


P 


29 


1 


59 


V 


51 


3 


81 


Q 


30 


2 


60 


w 


52 


4 


82 


R 


31 


3 


61 


X 


53 


5 


83 


S 


32 


4 


62 


Y 


54 


6 


84 


T 


33 


5 


63 


Z 


55 


7 


85 


U 


34 


6 






56 


8 


86 


V 


35 


7 






57 


9 


87 


w 


36 


8 






58 


• 


88 


X 


37 


9 






59 


• 


89 


Y 


38 


A 






60 


< 


90 


Z 


39 


B 






61 


— 






40 


C 







Chart of screen sizes 






Max. number of 

characters across 

(or number of columns) 


Max. number of 

lines down 

{or number of rows) 


VIC 20 


22 


23 


TRS-80 


64 


16 


BBC 


20/40/80 


16/24/32 


ZX81 


32 


22 


ZX Spectrum 


32 


22 


Apple 


40 


25 
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Conversion chart 

This (loick reference chart shows some of the variations in the BASIC used by the machines in this book. It does 
not include instructions for graphics, sound or colour as these vary so enormously from machine to machine. 
Note also that although most computers (except the BBC) use PEEK and POKE, they do not use the samesystem 
of memory addresses, so the numbers used with PEEK and POKE must be changed for each computer. 





BBC 


VIC/Pet 


Apple 


TRS-80 


ZX spectrum 


ZX81 


Select zandom 
munber between 
and 0.99999999 


RND(l) 


RND(l) 


RND(l) 


RND(O) 


RND 


RND 


Select random 
ntunber between 1 
andN 


RND(N) 


RND{1)*N+1 


RNrKl)*N+l 


RND(N) 


RND'N+1 


RND*N+1 


Select random letter 
between A and Z 


CHR$(RND(26)+64) 


CHR$(INT(RNrHl) 
*26+65)) 


CHR$(INT(RND(1) 
* 26+65)) 


CHR$(RNDC26)+64) 


CHR$(INT(RND'26 + 65)) CHR$(INT(RND* 26+ 38)) 


Clear screen 


CIS 


PRINT CHR$( 147) 


HOME 


CLS 


CLS 


CLS 


Check keyboard to 
see if key being 
pressed 


INKEY$(N) 


GETX$ 


IF PEEK{- 16384) 
> 127 THEN GET X$ 


INKEY$ 


INKETS 


INKEY$ 


Convert characters 
into code nnmbers 


ASC("X") 

(using ASCII code) 


ASCC'X") 

(using ASCII code) 


ASCC'X") 

{using ASCII code) 


ASCC'X") 

(using ASCII code) 


CODEC'X") 
(using ASCII code) 


CODEC'X") 
(using ZX8 1 code) 


Move cursor up 


PRINT CHR$(11) 


PRINT CHR$( 145) 


CALL -998 


PRINT CHR$(27) 


PRINT CHR$(11) 


PRINT CHR$( 112) 


Move cursor down 


PRINT CHR$( 10) 


PRINT CHR$( 17) 


PRINT CHR$( 10) 


PRINT CHR$(26) 


PRINT CHRSC 10) 


PRINT CHR$( 113) 


Move cursor left 


PRINT CHR$(8) 


PRINT CHR$( 157) 


PRINT CHR$(8) 


PRINT CHR$(24) 


PRINT CHR$(8) 


PRINT CHR$( 114) 


Move cursor right 


PRINT CHR$(9) 


PRINT CHR$(29) 


PRINT CHR$(21) 


PRINT CHR$(25} 


PRINT CHR$(9) 


PRINT CHR$( 115) 


Take 1st N 
characters of string 


LEFT$(A$,N) 


LEFT${A$,N) 


LEFT${A$,N) 


LEFT$(A$,N) 


A$(lTON) 


AS(ITON) 


Take last N 
characters of string 


RIGHT$(A$,N) 


RIGHT$(A$,K) 


RIGHT$(A$,N) 


RIGHT$(A$,N) 


A$(NTO ) 


A$(NTO ) 


Take middle N 
characters of string 


M]D$(A$,N1,N2) 


MID$(M,N1,N2) 


MID$(AS,NI,N2) 


M1D$(A$,NI,N2) 


A$(NlTON2) 


A$(NlTON2) 



to 



Answers 



Ton may find that your answers to 
D some of the puzzles are different to 
the ones givenhere. As long as they 
work on your computer then this 
doesn't really matter, but check to 
see if they are as neat and simple as 
the answers in the book. 



Pages 
Robot Missile 

Line 90 tells the computer how many 
times to loop round and get a guess 
from you. So, for more chances of 
guessing the secret code letter, 
change the last number in line 90 to a 
higher one. For less chances, change 
it to a lower one. 



Page? 

The Vital Message 



Page 11 

Desert Tank Battle 

Add the following lines to the program 
to add the possibility of the robots 
seeing you: 

175 IF RND<.05 THEN BOTD 250 

250 PRINT "TKEY'VE SEEN V^HJ-AASGeHHHH" 

260 STOP 

Change the RND in Une 175 to the 
version your computer needs. You can 
change .05 to any number between 
and 0.999, but remember that the 
higher the number you put here the 
greater the chance of the robots 
seeing you. 



Page 13 

Battle at Traitor's Castle 



This is a diMcult puzzle, so don't worry 
ifyoucouldn't do it. Try out the answer 
anyway. Add these lines to get the two 
targets. 



In this program, lines ISO and 160 are a 

"delay" loop. They make the computer 

do nothing for a certain length of time 

before going on to the next instruction 

in the program which is to clear the 

message offthe screen. To make the szxsv let p«=chr»(p+5i> 

messagestayonthescreenlonger. *"**^o irL^rTl^N'[Er^=R»*P« 
you need to make the computer loop 
roimd more times. You can do this by 
changing the last number in line ISO to 
a higher one. 



55 LET P=rNTtRND+.5)«4+l 



ISO LET S"S+P 



Pages 
Shootout 

To make it possible for the computer 
to miss too, add the following lines in 
addition to those in the 'Making the 
game harder" box. 



Page 15 
Robot Invaders 

You can get 100 points for U, V, W, X or 
Y and 10 points for the others by 
making these changes. 



220 LET H=H+10 
225 IF P»>"T" AND P«<' 
Hi»«+90 



THEN LET 



155 IF RNIK.l THEN GOTO 250 

250 FHSINT "HE SHOOTS BUT MISSES" 

260 eOTO 90 

Line 156 may need RND(l)orRND(0), 
depending on your computer. 



Page 17 
SecretWeapon 

You can add the scoring system in the 47 



48 



puzzle by putting these extra lines into 
the program. 

15 L£T S-O 

145 IF Z<-3 THEN LET S'S+l 

190 BDTD 217 

21S LET S-S+10 

217 PRINT "VOU SCORED ")8|" POINTS" 



Page 19 

Escape I 

This is the simplest way to add three 
robots to the game, though it makes 
the game rather difficult to win. 



22 FOR R"l TO 3 
25 PRIWT "ROBOT ";R 
30Q NEXT R 
310 STOP 



Page 21 
Pirate Dogfight 

To make your chance of hitting the 
pirate equal to his chance of hitting 
you, change the .7 in line 290 to .5. 



Page 23 
Supersonic Bomber 

To get more targets each time, change 
the 5 in lines 30, 70 and 120 to ahigher 
number. You must put the same 
number in all three lines. 



Page 25 
Iceberg 

You can make the grid bigger by 
changing ail the 8s in lines 20, 50, 70, 
80, 110, 120, 160, 170,290and310toa 
bigger number. (Use the same 
number each time.) 

To add more icebergs change the 4 
in line 30 to a higher number. 



Going further 

Here is a list of books you should 
find useful if you want to Knd out 
more about computers or writing 
programs. 

Uabome Guide to Computeis by 

Brian Reffin Smith, Usbome 

Undezstanding the Micro by 

Judy Tatchell and Bill Bennett, 

Usbome 

Introduction to Computer 

Programming by Brian Ref^ 

Smith, Usbome 

Illustrating BASIC by Donald 

Alcock, Cambridge University 

Press 

Fred Learns about Computers, 

Macdonald & Evans 

The BASIC Handbook by David 

A. Lien, Compusoft Publishing 

The Computer Book by Robin 

Bradbeer et al, BBC Publications 



First published in 1982 by 
Usbome PubUshing Ltd, 20 
Garrick Street, London WC2E 
9BJ, England. 

© 1982 Usbome Publishing Ltd 
The name Usbome and the 
device # are Trade marks of 
Usbome Publishing Ltd. 

All rights reserved. No part of 
this pubUcation may be 
reproduced, stored in a retrieval 
system or transmitted in any form 
or by any means, electronic, 
mechanical, photocopying, 
recording or otherwise, wiAout 
the prior permission of the 
ptiblisher. 



Printed in Spain by 
ELEXPURU, S. A. L.^ Bilbao 



Usborne Computer Programs - 

Each of these colonifol new books contains 14 simple games programs to 
play on a microcomputer.*^ Alongside the programs there are 
explanations of how they work and puzzles an'd suggestions for ways of 
changing them. Through playing these games even complete beginners 
will qnickly begin to understand how a simple program works and be 
itching to write their own. There are tips and hints on vrziting programs 
and a summary of BASIC at the back of each book and also a chart which 
vriU help you convert programs in magazines and other books to work on 
your micro. 

"The programs in thase books are suitable for use on the following 
micn^: ZX81, BBC, TRS-80, VIC 20, Pet, Apples which use Palsoft BASIC 
and ZX Spectrum^ • — ■ — i / — ^^__ 





Other Computer Titles 






A cotourfnl guide to 
miczocomputezs, how 
they work and what they 
can do, with lots of ideas 
for things yon can do 
writh a micro. 



A step-by-step guide to 
programming in BASIC 
for absolute beginners- 
With lots of pzograms to 
run on any 
microcomputer. 



A colourful look at bow 
computers play Space 
Invaders, chess and 
other games, with lots of 
tips on how to beat the 
computer. 



Published in Canada by Hayes Publishing Ltd, 3312 Mainway, Burlington, Ontaiio, Canada LTMIA?. 
Published in Oie USA by Msfes Books, 423S South Memcxial Drive, Tulsa, Oldahoma, USA. 



ISBN 086020 685 8 



Printed in Spain by ELEXPURU, S. A. L.-Bi!bao 



